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Version: *v04-000' 
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IDENT ‘V0Q4-000' 


PARARAAAAAAAAALLAAAALE AEA SALA EE LESSEE SESE SEER SEER ERAS RRR R EERE EEE EE EERE RES 


COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS ute UNDER A LICENSE AND MAY BE USED AND coco 
ONLY IN os DANCE WITH THE TERMS OF SUCH at SE AND a THE 


: * 
3 * 
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3 * 
‘ ® 
: ® 
4 w 
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THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
eeePORAT i be NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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Facility: Executive , Hardware fault handling 
Abstract: Unhandled exception and interrupt routines 
Environment: MODE=Kernel 
Author: RICHARD 1. HUSTVEDT, Creation date: 15-May-1979 
Modified by: 
v03-005 KDM0030 Kathleen D. Morse 18-Nov-1982 
Add logic that at ious or inary to continue execution 
of secondary-specific code without turning into a 
secondary processor. Remove pagefault handler as no 
longer needed. 
v03-004 KOn0018 Kathleen D. Morse 08-Oct-1982 
Move all logic to handle kernel aoge system services 
on secondary to MPCMOD.MAR. This includes t S 
exit system service and the code that came Ph lene 4t. 


v03-003 KDM0005 Kathleen D. Morse 31-Aug-1982 
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SOOoooooooooooooooooooooooooosoa 
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Soooooooo 
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Add a gecondery pope faut handler, to allow backing out 
of MPSSCOMPAT if it takes a pagefault. 


v03-002 R1H0001 Richard I. Hustvedt 1-Jun-1982 
Correct handling of AST queue by secondary processor to 
avoid ening some AST notifications by incorrectly computing 
PHD$B_ASTLVL. 
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; INCLUDE FILES: 


; MACROS: 


4 ; 

5 ; Macro to define an interrupt service routine label 
§ : for unexpected interrupts 
0 
4 
8 
9 
1 


MACRO ISRDEF ,VNUM 
eALIGN LONG ; Make all vectors long word alligned 
ssaner ; Unexpected interrupt service rtn Label 


: Macro to define the interrupt service routine labels 
3; for an adapter 


‘ .MACRO ADPISR,SLOT 
VECTOR = SLOT * 4 + 256 


iSRDEF \VECTOR 


OoOOoooooooooooo 


SSSssssssss 


GOOSOOCSSSSSSOSOoCoooo 


0 VECTOR = VECTOR + <16 * 4> 
§ BSBB ADP_HANDLER 3; Call interrupt service routine 
BYTE SLOT ; TR index for this int srv rtn 


-ENDM = ADPISR 


OO O00 000000190909 0909090908 SIN NINN NOOO 


we 


96 ; 
$7 ; EQUATED SYMBOLS: 


SOSoOSCSCOSoOOoOoOoOOoOSooosSo 


SOoOoooooooooooooooooooooos2[oooooooooeo 
SssooooooooeeSeSoeSS 


35 
100 SEMBDEF <UI> 3; Error Log message buffer offsets 
101 SIPLOEF : Interrupt priority levels 
1 § SPCBDEF 3 Process control block offsets 
> 9 SPHDDEF ; Process header block offsets 
0 104 SPRDEF ; Define processor register numbers 
0 105 SPSLDEF ; Define PSL fields 
as $ SRPBDEF : Define reboot parameter block 
p ! SSSDEF : Define system status codes 
8 1 8 pean 
0 110 ;DEBUG=1 tee] f defined, enable unexpected 
0 FF ;*** interrupt identifies vector # 
118 3 
114 ; OWN STORAGE: 
115 ; 


N 
Y PROCESSOR INTERRUPT AND 2xce 16-SEP-1984 02:04:55 VAX/VMS Macro Vv04-00 Pa 
NT = Unexpected interrupt rout et 7 85:88:83 ERP. SRCIMPINTEXC MAR: 1 as 


-SBTTL MPSSUNEXPINT = Unexpected interrupt routine 


sls * 


xo 


v> 
—D 


+ 


C*°VNUM = es SERVICE FOR SCB VECTOR VNUM. 
EXPINT = General unexpected interrupt service routine 
in 

U 


terrupt service routines are executed for unused SCB vectors. 
BUG is defined, egch nrerrust service calls ERLSUNEXP with 
vector offset>/2 into the SCB as a 1 byte argument. 
BUG is not defined, all interrupt service routines gor tapee to 
obal labels equal to ERLSUNEXP. There are enought interrupt 
Facvice cout ines for the architectural page of the SCB, ij.e., 
routines. 


INPUTS: 
0¢ 
4( 
OUTPUTS: 


SP) = PC at interrupt 
SP) = PSL at interrupt 


0000 -PSECT SAEXNONPAGED,LONG 


-ALIGN LONG 


ALL unused vectors in the SCB point to locations in the following table. 
There is one longword for each longword in the SCB. The unused vectors 
may sometimes receive interrupts which must be handled in some way. for 
all cpu-type interrupts, the routine MPSSUNEXPINT is executed. For all 
adapter interrupts, the routine ADP_HANDLER is executed. The former 
passes the process currently executing back to the orinery or bugchecks, 
depending upon whether or not it is on the interrupt stack. The latter 
routine creates and error log entry for the unexpected interrupt and REIs. 


-ALIGN LONG 


OGOoOOCoSOSCSOOOCOOCOSOOOSOOSOOSOSOOSOOSOOOOSOOOSSOSO M2 


SOSOOSOSOOSOOSOSOSOSOSOSOOSOOOSOOSOOSOOOOOOOOSOOSOOS 
RWAWARARHQOSOOOCOOOOCO OOOO OCOOOO COCO CO COCO OOS OOOO OOOCOSOOSOOOOOOOOOOO 


oo 


oO Be Ge Ge Ge Sete Se Ge Ge Ge 


0 
PU_UNEXP: 
00000000 VNUM=000 3; First vector = 0 
; eREPT 3 ISRs for cpu interrupts only 
ISRDEF \VNUM 3; Define ERLSVEC'VNUM Label and ISR 
BSBW MPSSUNEXPINT ; Call unexpected interrupt service rtn 
-BYTE <VNUM>/2 : Identify vector offset into SCB 
VNUM=VNUM+4 3; Next vector 
ADP_UNEXP: 
00000000 NEXUS = First adapter = 0 


ISR's for 16 adapters only 
Define ERLSVEC'V labels and IS%s 
Next adapter 


REPT 6 
ADPISR \NEXUS 
a tet = NEXUS + 1 


Unexpected adapter interrupt handler: 


— 
a a ee eS) 
SSDP PPD PPP PAD. PTI Be BB BB BB IAIN I IRONIPIPONINIPININIY SS SS 
WI —@§ OOD NEW 0 OD NAME WN @§ O ODA NE WIP 0 ODNOAOU EWN" OOONOU ES UP" O0OO~I 


SOOOOCOOCOOOOSOOOSOOOOOOOOOSOOOSSSSS JOOOOOOOOOOOOOOOOOOOOOOOOSOOSO 20 


ed me ah a dD A st 


This routine is entered whenever an adapter on the secondary interrupts. 
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6€ ona? elt 
6E ve 


F 
53.14 A 
54 00000000'FF4 
04 Ad 
54 64 


NOPOOCOCOCOVCOO oF on 


GOooooo°ooo 


OD a a a a a a a a od 
SIN NNINA AAAI BBB EAI 
Mo POM NFS MMDoOOnr > NOON NN" 
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¢ ; It logs the unexpected interrupt by creating an error log entry and then 
3; attempts to clear the interrupt. 


1 § : 
1 
158 ADP HANDLERS — 
180 <s SUBL #ADP_UNEXP+2, (SP) ; Compute adapter offset 
181 DIVL #2,(SP) 3; Compute adapter slot/TR number 
1 é PUSHR #*M<RO,R1,R2,R3,R4> > Save registers 
1 MOVL *4(SP),R ; Retrieve slot number 
184 MOVL @MMGSGL_SBICONFCR3],R4 ; Get ‘dress of adapter registers 
185 CLRL 4(R4) 3 Dir » adapter interrupts 
: $ 108 MOVL (R4) ,R4 3; Get adapter's configuration reg 
188 MOVL ecmere UI_LENGTH,R1 ; Set size of message to allocate 
189 BSBW MPSSALCOCEMB ; Allocate an error log buffer 
190 BLBC 20$ : Bronce if none available 
191 MOVW 4 UI, EMBSW emilee ) ; Set message type 
198 MOVL -EVBSL_UI_TR(R2) ; Set slot/TR number 
19 MOVL R4 ,EMBSL_UI_ CSR(R2) ; Set configuration register value 
194 BSBW MPSSRELEASERB : Release buffer 
195 208: POPR #*M<RO,R1,R2,R3,R4> 3; Restore registers 
° ; Remove slot number 
196 ADDL #4,SP R l b 
+ 4 REI ; 
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; FUNCTIONAL DESCRIPTION: 


; if vector identification (DEBUG) 


; This routine is the unexpected ge a gy a ek 
nabled. On the top o e 


; stack will be the <vector offset>/2 into the SCB. 


0B 04 A ” 
04 AE 061F 0600 


a ee el a a ood a 
FF OOOOWWWDWOOWOOO NNN Naa 
AINE AR 2 O DONA UNE WIN 9 OD NOA UE WIN SO OD NAU EWR OO OONAU EWN 0 OO NOAUES WN O 


BRON SAAN NNNNNSOOMMmMmMmMmmmmmmmmmmmmmmmemmmmmmmemememnmememmmmmemema©nmn 


PUPP Be BS BS BS BBE BE A.A MII. AAAI WII PPO NIPINIPININDDY 2 SP OO OO OS 


0 
0 
0 
Q 
0 
0 
Q 
Q 
0 
0 
i] 
0 
0 
0 
Q 
i] 
0 
0 
0 
i] 
0 
0 
0 
0 
0 
. 


At the time the routine is entered, the stack looks like the following: 


! PC from a BSBW in SCB ! 


en a mm wearer mmo mosae ae ¢ 


optional \ 
parameters \ 


we tee 4 


! PC at time of exception H 


fp wme wena res ercmawwacanmweam nema 


' PSL at time of exception ; 


feos es oo mene neonrsewveoee 


The st processor computes the address of the vector for 
this particular interrupt in the primary's SCB. It places this 
PC and the current PSL on the stack and returns the process to 
the pr Seery processor. A SVPCTX is done by the gocendery. which 
takes the PC=-PSL pair and places them in the hardware PCB. The 
peer will immediately handle the interrupt when it starts 
executing this process. 


This code is executed for any exception that happens on the secondary, 
e.g., access violation, pagefault, change mode to kernel, etc. 


ENVIRONMENT: 
Executes on the secondary processor. 


-ALIGN LONG 
MPSSUNEXPINT:: : 
MOVZBL a(SP), (SP) s**eQverlay return with vector offset 
#2, (SP) z**eConvert arg to vector offset 

IF DF ,MPPFMSWT 

a MPSSPFM_UNEXP ; Gather performance statistics 

ADDL3 G*EXESGL_SCB,(SP),-(SP) ; Compute proper PC for continue 
; _in primary processor 

BICLS #3,a(SP),(SP) ; Continuation PC is the SCB vector B 
; Location in the primary less int stk bit 

MOVPSL 4(SP) ; Save current PSL 

BBS #PSLSV_IS,4(SP) ,10$ ; Br if on interrupt stack 


BICL  #PSLSMTIPL,4(SPS : Force IPL to zero 
: Now drop the current process and ask the primary processor for another. 


rote 


) 
wettine crix PROCESSOR INTERRUPT AND Exce 


FESO" 31 


UNEXPINT = Unexpected interrupt rout 


1A4 (3 
16 BRW MPSSMPSCHED2 
1A7 60 10$: SECBUG_CHECK MPUNEXPINT,FATAL 


"SrSEp-1986 83:86:38 
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; And get another 


Page 7 


3; Unexpected interrupt or exception 
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~SBTTL AST DELIVERY INTERRUPT SERVICE 
FUNCTIONAL DESCRIPTION: 


This routine is entered from the AST oe, vere interrupt. If it 
saterruts some kernel mode execution, then the AST delivery cannot 

be hand og now and it merely sets the hardware register ASTLVL so 

that the interrupt is canceled. If any other mode is interrupted, then 
the process is folded up and returned to the pow processor. When 
the or nary processor does a LDPCTX and an REI to start executing this 
process, the REI finds that the hardware register ASTLVL differs from 
that in the process header and the AST is delivered. 


vo 


SOGDOOOOOSO0O0O0 00000 O00 0009 69 09 09 09 09 09 08 SI NINN NINN INO OOOOOAOA DD 


MPINTEXC = SEC 
vOe~000 AST D 


ma 
z~< 
— 

“oo 
mn 
maw 


INPUTS: 


(SP) = PC at time of interrupt 
4(SP) = PSL at time of interrupt 


ENVIRONMENT: 
Executes on the secondary processor. 


eALIGN LONG 3; Longword align interrupt routines 
MPSSASTDEL:: 

07 AE O03 93 BITB #<PSLSM_CURMOD - ; Check if a kernel mode routine 
@<-PSL$V_CURMOD>>, - 3 was interrupted 
4+<PSL$V~CURMOD@-3>(SP) : 

04 12 BNEQ MPSSUNEXPINT1 3; Br if not kernel, ge handle AST now 
13 04 ODA MTPR #4, #PR$_ASTLVL ; Don't handle the AST delivery now, 
; and disable the interrupt 
02 REI ; Return from interrupt 


: The following is in the format of the SCB vectors. 


MPSSUNEXPINT1: 
PUSHL 


00020000 8F ODD #<IPL$_ASTDEL @ PSLSV_IPL> ; Return process to primary to do AST 


00000000'GF 9F PUSHAB G“SCHSASTDEL ; delivery and execution 
IF DF ,MPPFMSWT 
ty MPSSPFM_ASTDEL 3; Gather performance measurement data 


me a ed a ed ed = 8 8 2 2 I I a 4 
OOOOOOoOWWWWWWIOIOWVTWTOOO>r>>>>r>?>Yrr>r>rrr,rr>r>r?r?r?r?r?r>rrr?r?rrr Uo 
PNPM IM ININ SAAAAAAMNUMIOOOOM HOOMAOOOAOOAOOHAAOHAAOAOHAOOOOOOo <PyYy 
ONAOUES WN $$ O OONAUE WN O OONOAUE WN" OOONOUE WN OOOnNOursfunm ZO 


SOOQCCOOCOCOCOCOCOSOOOOOGOOOOCSOCOCOCCOOOOCOOOOOOOOCOOOOOOoOOoO MO 


FE3B° 31 BRW MPSSMPSCHED2 ; Go fold up the process & hand it back 


eee — eee soem —— co 
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-SBTTL MPSSKERSTKNV = KERNEL STACK NOT VALID FAULT 
MPSSKERSTKNV = KERNEL STACK NOT VALID FAULT 
FUNCTIONAL DESCRIPTION: 
This routine ‘s gutonet ical ty vectored fo when a kernel stack not 
valid is detected during a change mode instruction, during an REI 
instruction, or Gur ine an attempt to push exception information on 
the kernel stack. This exception runs on the interrupt stack. The 
state of the stack on entry is: 


po rere - Exception PC 
4(SP) = Exception PSL 


A fatal kernel stack not valid bugcheck is declared. 
ENVIRONMENT: 
Executes on the secondary processor. 


un“ 
zo 


COOCOSCCGCOCOCOOCOOCOOCOCOOOOOOOOOOCoOOoO MO 


-ALIGN LONG 
MPSSKERSTKNV:: ; Kernel stack not valid fault 
SECBUG_CHECK MPKNLSTKNV,FATAL ; Kernel stack not valid bugcheck 


a ss i te ts 


AINE WN $$ O OONA UENO OO NOAUNE UP. 


WWAN ANIA POPONOPOPOPONONN) 2 oes 
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B .SBTTL SECONDARY PROCESSOR COMPATIBILITY MODE FAULT HANDLER 
: FUNCTIONAL DESCRIPTION: 


MPINTEXC ° 
voe~000 SE 


aw 

wm 
33 
PZ 
ao 
<> 

aa 
-—m 
—@D 


) 


This routine is automatically vectored to when a compatibility mode 
; exception is detected for a process executing on the secondary. The 
state of the stack on entry is: 


OC(CSP) = Compatibility exception code 
4(SP) = Exception PC 
8(SP) = Exception PSL 


Possible compatibility exception codes are: 
Reserved instruction execution 


Trap instruction execution 
Illegal instruction execution 
Odd address fault 

Tbit trap 


The exception name followed by the number of exception arguments are 
pushed on the stack. Final processing is accomplished in common code. 


eeeveeeeenee 
m 
=z 
~ 
p= | 
w 
o 
7 
c 
o 
oe 
—~ ~~ 
oO 
> ] 
eo 
Be 
om 
o 
Cc 
ot 
—_. 
°o 
P| 


FUN OOOO UE WH OOONAOUS W000 MO 
NOUS WIN —O 


If there is no gree he he mode handler declared, then the process 
is folded up and handed back to the primary, in such a way that the 
primary will execute in EXCEPTION. 


Environment: 


~ 
Oo 


Executed by the pecenters processor, in kernel mode, on kernel stack. 
If interrupted at any point, can continue execution on primary. 


LONG 


RO,@#CTLSAL_CMCNTX 


ALIGN 
MPSSCOMPAT:: 
mova 

aaCTL$AL_CMENTX+8,RO 


Compatibility mode faults on secondary 
Save RO,k1_ in compat context region 
Get addr of ggroes vets ity context area 


00000000'9F 50 7D 
: Save R2 and R 


50 00000008' 9F E 


80 ¢¢ D mova ~(RO)+ 
80 4 7D mova R4,(RO)+ Save R4 and R5 
4 36 +4 MOVL R6,(RO)+ Save R6 
E b MOVL (SP)+, (RO)+ 3; Save sucept ton code & clean off stack 
60 E D MOVa (SP)+, (RO) ; Save PC/PSL and clean off stac 
03C00000 8F oD PUSHL #<PSLEC_USER@PSLSV_PRVMOb>! <PSLSC_USER@PSLSV_CURMOD> ; Fabricate 
: a or 
00000000°9F 0D PUSHL @#CTLSGL_CMHANDLR ; Compatibility mode handler address 
01 1 20$ ; Branch if none s eg fied 
0 REI ; Jump to compatibility handler 


No compatibility mode handler was declared. Restore the stack and 
saved register, and return process to primary to continue through 
normal erceet ton code. RO now points to the saved PC in the 
compatibility context area. 


SOOOOOOSOOSOCOSOOCOOSOCOOSOSOSSOSSOOOSSSOSOSSSOOSOOOOOOOOOOCOOOOOOOOOOOOO 
a a a ed at at ot = = = 2 a 3 = — — — — 9 2 od 1 2 —) 6 8 1 ss 
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AOOOOODOUWS FNL -MNOOV TV VO V VV VV VVC VCC VUTUCC"C"U"CC"CT"C0"0"0000"0"00"0"0"0"0"0"0 
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ery RO) ,RO 
#SS$_ COMPAT , (SP) 
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Restore ereqes ten PC/PSL 
Push onceat on code again 
Restore RO from context area 
Set pat eds name 


PUSHL # : Set signal ecqueents 
IF PRIMARY <JMP G*EXESEXCEPTION> ; IF PRIMARY, etn NTINUE iy 


PTION 
ONDARY, RETURN PROCESS TO PRIMARY 


#PSLSV ~CURMOD .#PSL SS cuRMOD, TeCSP) ),-(§P) sCreate PC/PSL w/prev 
ae P) i; mode correct & current mode of kernel 


Adr where primary will execute 


; Hand process back to primary 
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~-SBTTL SYMBOLS NEEDED FOR XDELTA 


: the following symbols are defined so that XDELTA can be Linked 
nto MP.EXE for debugging the secondary processor. 


MPINTEXC = SECONDARY 
vou~000 SYMBOLS. NEED 
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ESPAG 
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ESBREA K=sERLAVECAA 
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MPINTEXC 
Symbol table 


ERLSVEC4 
ERLSVEC4 
EMS 


ER 
EXESACVIOLAT 


MP 
MPSSUNEXPINT 
MPSSUNEXPINT1 
NEXUS 
PRS_ASTLVL 


PSLSC_USER 
PSLSR_CURMOD 
PSLSM 


PS 
PSL$V_PRVMOD 
RPBSL_SCBB 


Hunhnnnhnnnnun 


$0008 28 
000 000 


gereearne 


00000024 


reeeraere 


geereree 
geeerere 
eeereeee 


sit 


pars 
oo 


al 
~~ § sOO00——— 


OOF OWOMOOW—WOOO 


ASSOC DLOWDN BLOOM GBEODLOONWDLOOOM@OLSO 
Ps] 


P+ $$ ees EEE EL EEL EEL EEL EEL LS, 
DADAQAAAAAIMAAAAIAAAMAAAAAa aac 


CGOOOOCOCOOSOOSSO COOOCCOOOOOCOOoO 


SCHSASTDEL 
SS$_COMPAT 
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Psect synopsis -SEP-1984 :06:36 (CMP.SRCIMPINTEXC.MAR;1 (1) 
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! Psect synopsis ! 
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PSECT name Allocation PSECT No. Attributes 


- ABS . 00000000 ( -) 00 ¢ 0.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SABSS 8 0 ° ( -) O17 ¢ 1.) NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
SAE XNONPAGED 0 ( 568.) 02 ¢ 2.) NOPIC USR CON REL LCL NOSHR EXE R&D WRT NOVEC LONG 
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! Performance indicators ! 
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Phase Page faults CPU Time Elapsed Time 


Initialization 30 90: +08. 9 6: 0:01.16 
Sy prone 15) SRRRIHR RS BBE 
syabol, table sort of 0: 201.64 0: 0:0 “32 
bobs table euteut 35 (0:00:08:19 00:00:00-7 
Psect synopsis output 0: 8: 0a'8 8! 0:00.0 
Cross-reference output 0:00: 9-9 B08 00-8 
Assembler run totals 64 0:00:17.1 00:00:49.34 


The working set Limit was 1500 pages. 

65054 bytes (128 pages) of virtual memory were used to buffer the intermediate code. 

There were 60 pages of symbol table space allocated to hold 1132 non-local and 5 local symbols. 
source Lines were read in Pass 1, producing 21 object records in Pass 2. 

25 pages of virtual memory were used to define 22 macros. 
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! Macro Library statistics H 
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Macro soerer? name Macros defined 


55$DuU : CMP. mye: 4 
$35580UA age: ES SY$.0B JLIB.MLB;1 8 
SYSLIBJSTARLET.MLB;2 6 

retary (all Pivcrhess 18 


1140 GETS were required to define 18 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=LISS:MPINTEXC/OBJ=OBJ$:MPINTEXC MSRC$:MPPREF IX/UPDATE=(ENHS:MPPREF 1X) +MSRC$:MPINTEXC/UPDATE=(ENHS:MPINTEXC) +EXECMLS/LIB+LI 
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